      ! no weights
      if (regions % function_twod == ID_FUNC) then
        do i = 1, solve
          do v = 1, levels

! 1 -> 2
